home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 44 / Amiga Format CD44 (1999-08-26)(Future Publishing)(GB)(Track 1 of 3)[!][issue 1999-10].iso / -serious- / wb / m2i5_78 / rexx / snd.m2i < prev    next >
Text File  |  1999-07-12  |  340b  |  24 lines
  1. /* Change SoundTask flag, and save menu if needed */
  2. OPTIONS RESULTS
  3. ADDRESS "M2IPort.Rexx"
  4.  
  5.  REQUEST "Sound Task must be on?"
  6.  IF RC=0 THEN DO
  7.     SOUND OFF
  8.  END
  9.  ELSE DO
  10.     SOUND ON
  11.  END
  12.  
  13.  IF RC~=5 THEN DO
  14.     REQUEST "Save Menu?"
  15.     IF RC=1 THEN DO
  16.        SAVEMENU
  17.     END
  18.  END
  19.  ELSE DO
  20.     ERROR "The state doesn't change"
  21.  END
  22.  
  23. EXIT
  24.